home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 November / Macworld (1999-11).dmg / Updaters / WhiteCap 3.0.4 / into Visual Plug-ins / WhiteCap Configs / South American Andy < prev    next >
Encoding:
Text File  |  1999-08-15  |  1.6 KB  |  99 lines  |  [TEXT/ttxt]
  1. /*
  2.  
  3. "andyp",
  4.  
  5. andy, were are you in South America today?  I hope your spending those saved-Taco Bell dollars for only the best tequila...
  6.  
  7. o happy day... 
  8. move forward in this generation...  triumphtantly...
  9. won't you help to sing,
  10. the songs of freedom,
  11. songs of redemption,
  12. is all i ever had,
  13. redemption song...
  14.  
  15.  
  16. -"andyo"  */
  17.  
  18. Resn=5,
  19.  
  20. Durn="1.4",
  21.  
  22. // I want an inclined eliptical orbit--like a comet would have around a sun 
  23.  
  24. A0=" 80",        // Small axis
  25. A1=" 100",  // Large axis
  26. A2="sqrt( A1 * A1 - A0 * A0 )",   // Focus radius
  27. A3="2 + rnd( 3 )",                                        // Pick a random orbit speed factor 
  28.  
  29.  
  30. B0="A1 * cos( t / A3 ) + A2",    // x
  31. B1="A0 * sin( t / A3 )",         // y
  32.  
  33. // B0 and B1 now trace out an orbit on the z-plane
  34. // We'll 'incline' the orbit by rotating around the y-axis a little ( "x" is x and "y" is z )
  35. // x' = x cos( a ) - y sin( a )
  36. // y' = x sin( a ) + y cos( a )
  37. B2=" .15 + .6 * ( .5 * cos( t / 9 ) + .5 )",     // the ang -- we change it thru time
  38. B3="B0 * cos( B2 )",
  39. B4="B0 * sin( B2 )",
  40.  
  41. CamX="B3",
  42. CamY="B1",
  43. CamZ="B4",
  44.  
  45. CmLX="0",
  46. CmLY="0",
  47. CmLZ="20",
  48.  
  49. CUpX="0",
  50. CUpY="0",
  51. CUpZ="1",
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58. R=".46 * ( 1- dt ) + .2",
  59. G=".63 * dt + .32",
  60. B=".66 * ( 1- dt )",
  61.  
  62. LvlR=".2",
  63. LvlG=".95",
  64. LvlB="0",
  65.  
  66. // Just makes the dt=0 linewidth 2
  67. LWdt="1 + sqwv(1+dt)",
  68.  
  69.  
  70.  
  71. // Preferred dimentions/aspect
  72. widt=400,heig=400,
  73.  
  74.  
  75. ConL=1,ConB=2,
  76.  
  77.  
  78. Fall=".05",
  79.  
  80.  
  81. C0="1 - dt",
  82. C1="40 * C0",
  83.  
  84. C2="30 * exp( - ( 3 * c0 ) ^ 4.6 )",
  85.  
  86. X="c1 * cos( 6.2831853 * s )",
  87. Y="c1 * sin( 6.2831853 * s )",
  88. Z="C0 * ( 13 * abs( mag( s ) ) + 5 * sin( 8 * PI * s ) ) + c2",
  89.  
  90.  
  91.  
  92. Scal="900",
  93.  
  94. ScSz=1,
  95.  
  96. Pers="90",
  97.  
  98.  
  99. Vers=30